home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Animator
/
Animator (Catchers).iso
/
Acrobat
/
Reader
/
AcroRd32.exe
/
PSPROCSET
/
19
< prev
next >
Wrap
Text File
|
1999-03-18
|
6KB
|
265 lines
%%BeginResource: procset pdflev3
%%Version: 4.0 1
%%Copyright: Copyright 1987-1999 Adobe Systems Incorporated. All Rights Reserved.
%%LanguageLevel: 3
%%Title: PDF operators, with code specific for Level 3
/_defaulthalftone currenthalftone dd
/_defaultblackgeneration currentblackgeneration dd
/_defaultundercolorremoval currentundercolorremoval dd
/_defaultcolortransfer [currentcolortransfer] dd
/_processColors
currentpagedevice /ProcessColorModel getifknown
{ << /DeviceGray [/Gray]
/DeviceRGB [/Red /Green /Blue]
/DeviceCMYK [/Cyan /Magenta /Yellow /Black]
/DeviceCMY [/Cyan /Magenta /Yellow]
/DeviceRGBK [/Red /Green /Blue /Black]
>> exch getifknown {} {[]} ifelse }
{[]}
ifelse
def
/initialize {
_defaulthalftone sethalftone
/_defaultblackgeneration load setblackgeneration
/_defaultundercolorremoval load setundercolorremoval
_defaultcolortransfer aload pop setcolortransfer
false setoverprint
} bd
/terminate { } bd
/m/moveto ld
/l/lineto ld
/c/curveto ld
/setSA/setstrokeadjust ld
/sh
{ dup /DataSource known
{ dup begin
DataSource type /filetype eq { DataSource resetfile } if
end
} if
shfill
} bd
/defineRes/defineresource ld
/findRes/findresource ld
currentglobal
true systemdict /setglobal get exec
[/Function /ExtGState /Form /Shading /FunctionDictionary /MadePattern /PatternPrototype /DataSource]
{ /Generic /Category findresource dup length dict copy /Category defineresource pop }
forall
systemdict /setglobal get exec
/ri {
/findcolorrendering isdefined?
{
mark exch
findcolorrendering
counttomark 2 eq
{ type /booleantype eq
{ dup type /nametype eq
{ dup /ColorRendering resourcestatus
{ pop pop
dup /DefaultColorRendering ne
{
/ColorRendering findresource
setcolorrendering
} if
} if
} if
} if
} if
cleartomark
}
{ pop
} ifelse
} bd
/_sfcs { _fcs setcolorspace } bind dd
/_sscs { _scs setcolorspace } bind dd
/_sfc {
_fc aload pop
_fp null eq
{ _op?
{ _opmode 1 eq
{ _fcs GetCSFamily /DeviceCMYK eq {DoNonZeroOverprint} if
} if
} if
setcolor
_op? setoverprint
}
{ _fp setpattern }
ifelse
} bind dd
/_ssc {
_sc aload pop
_sp null eq
{ _OP?
{ _opmode 1 eq
{ _scs GetCSFamily /DeviceCMYK eq {DoNonZeroOverprint} if
} if
} if
setcolor
_OP? setoverprint
}
{ _sp setpattern }
ifelse
} bind dd
/CMYKDeviceNColorspaces [
[/Separation /None /DeviceCMYK {0 0 0}] bind
[/Separation (Black)
/DeviceCMYK {0 0 0 4 -1 roll}] bind
[/Separation (Yellow)
/DeviceCMYK {0 0 3 -1 roll 0}] bind
[/DeviceN [(Yellow) (Black)]
/DeviceCMYK {0 0 4 2 roll}] bind
[/Separation (Magenta)
/DeviceCMYK {0 exch 0 0}] bind
[/DeviceN [(Magenta) (Black)]
/DeviceCMYK {0 3 1 roll 0 exch}] bind
[/DeviceN [(Magenta) (Yellow)]
/DeviceCMYK {0 3 1 roll 0}] bind
[/DeviceN [(Magenta) (Yellow) (Black)]
/DeviceCMYK {0 4 1 roll}] bind
[/Separation (Cyan)
/DeviceCMYK {0 0 0}] bind
[/DeviceN [(Cyan) (Black)]
/DeviceCMYK {0 0 3 -1 roll}] bind
[/DeviceN [(Cyan) (Yellow)]
/DeviceCMYK {0 exch 0}] bind
[/DeviceN [(Cyan) (Yellow) (Black)]
/DeviceCMYK {0 3 1 roll}] bind
[/DeviceN [(Cyan) (Magenta)]
/DeviceCMYK {0 0}] bind
[/DeviceN [(Cyan) (Magenta) (Black)]
/DeviceCMYK {0 exch}] bind
[/DeviceN [(Cyan) (Magenta) (Yellow)]
/DeviceCMYK {0}] bind
[/DeviceCMYK] bind
] def
/DoNonZeroOverprint {
6 dict begin
/kk exch def
/yy exch def
/mm exch def
/cc exch def
/sum 0 def
cc 0 ne {/sum sum 2#1000 or def cc} if
mm 0 ne {/sum sum 2#0100 or def mm} if
yy 0 ne {/sum sum 2#0010 or def yy} if
kk 0 ne {/sum sum 2#0001 or def kk} if
CMYKDeviceNColorspaces sum get setcolorspace
sum 0 eq {0} if
end
} bd
/scn {
dup type /dicttype eq
{ dup /_fp xdd
dup /PatternType get 1 eq
{ /PaintType get 1 eq
{ /_fc _fillColors 0 get dd ilp }
{ /_fc _fillColors
_fcs 1 get
GetComps get dd
sc
}
ifelse
}
{ pop /_fc _fillColors 0 get dd ilp }
ifelse
}
{ sc }
ifelse
} bd
/SCN {
dup type /dicttype eq
{ dup /_sp xdd
dup /PatternType get 1 eq
{ /PaintType get 1 eq
{ /_sc _strokeColors 0 get dd ilp }
{ /_sc _strokeColors _scs 1 get GetComps get dd
SC
}
ifelse
}
{ pop /_sc _strokeColors 0 get dd ilp }
ifelse
}
{ SC }
ifelse
} bd
/gs {
begin
/SA here { setstrokeadjust } if
/OP here { /_OP? xdd } if
/op here { /_op? xdd }
{ /OP here { /_op? xdd } if }
ifelse
/OPM here { /_opmode xdd } if
/BG here { setblackgeneration } if
/UCR here { setundercolorremoval } if
/SM here { setsmoothness } if
/FL here { i } if
/RI here { ri } if
/TR here
{
dup xcheck
{ settransfer }
{ aload pop setcolortransfer }
ifelse
} if
/sethalftonephase isdefined? { /HTP here { sethalftonephase } if } if
/HT here { sethalftone } if
currentdict gsDI
end
} bd
/f {
{ { sfc fill }
{clipsave sfc fill cliprestore clip newpath icl ilp}
{clipsave sfc fill cliprestore eoclip newpath icl ilp}
} _doClip get exec
} bd
/f* {
{ { sfc eofill }
{clipsave sfc eofill cliprestore clip newpath icl ilp}
{clipsave sfc eofill cliprestore eoclip newpath icl ilp}
} _doClip get exec
} bd
/S {
{ { ssc stroke }
{clipsave ssc stroke cliprestore clip newpath icl ilp}
{clipsave ssc stroke cliprestore eoclip newpath icl ilp}
} _doClip get exec
} bd
/rf {
{ { sfc rectfill }
{clipsave sfc rectfill cliprestore clip newpath icl ilp}
{clipsave sfc rectfill cliprestore eoclip newpath icl ilp}
} _doClip get exec
} bd
/every? {
true
3 2 roll
{ 2 index exec not {pop false exit} if } forall
exch pop
} bd
/knownColorants? {
3 dict begin
/colorants exch def
{
/DeviceN /ColorSpaceFamily findresource pop
/cpd currentpagedevice def
/dc 10 dict def
cpd /SeparationColorNames getifknown
{ { dc exch 0 put } forall } if
_processColors { dc exch 0 put } forall
colorants {dc exch known} every?
} stopped
{ false }
if
end
} bind def
/makePat {
gsave
dup /Matrix get concat
matrix makepattern
grestore
/MadePattern defineRes pop
} bd
%%EndResource